home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Compute! Gazette 1993 July
/
1993-07.d64
/
memory snooper.p
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-09-20
|
156b
|
7 lines
5 print"[147]":poke53280,6:poke53281,6
10 s=41118:e=41865
20 for i=s to e
30 c=peek(i):if c>31 and c<123 then print chr$(c);
40 get k$:if k$=chr$(13) then print
50 if k$<>"_" then next i